dclick /if ($1 < 5) halt | server $gettok($window(@ports).titlebar,2,32) $remove($remove($strip($gettok($line(@ports,$1),2,32)),[),])
Connect to port...:if ($sline(@ports,1).ln < 5) halt | server $gettok($window(@ports).titlebar,2,32) $remove($remove($strip($gettok($sline(@ports,1),2,32)),[),])
-
%_port.pop1:{
_dosort @ports 5 4 75
unset %_port.pop1
set %_port.pop2 Sort by port number
rline @Ports 2 Currently sorted by speed (fastest ports first)
}
%_port.pop2:{
_dosort @ports 5 2 $chr(91) 93
unset %_port.pop2
set %_port.pop1 Sort by port speed
rline @Ports 2 Currently sorted by port number
}
Get new list:ports
-
Copy to clipboard:if ($sline(@ports,1).ln < 5) halt | clipboard $_stripout($sline(@ports,1))
Chat:window -c @Whois | if (%_last.whoist == is) c %_last.whois | else { disp Attempting to connect via chat to IP of %col.target $+ %_last.whois $+ ... | if ($longip(%_last.whois.addr) != $null) c %_last.whois.addr | else { .enable #-wwdc | .dns %_last.whois.addr } }